home *** CD-ROM | disk | FTP | other *** search
/ Almathera Ten Pack 3: CDPD 3 / Almathera Ten on Ten - Disc 3: CDPD3.iso / fish / 001-100 / 001-025 / 009 / proff / pinit.c < prev    next >
C/C++ Source or Header  |  1995-03-17  |  1KB  |  90 lines

  1.  
  2.  
  3.  
  4.  
  5. #include <stdio.h>
  6. #include <ctype.h>
  7. #include "proff.h"
  8. #include "debug.h"
  9.  
  10. /*
  11.  * finit - initialise parameters, set default values
  12.  *       used by .reset command
  13.  *
  14.  */
  15. finit()
  16. {
  17.     int i;
  18.  
  19.     inval = 0;
  20.     rmval = PAGEWIDTH;
  21.     tival = 0;
  22.     lsval = 1;
  23.     fill = YES;
  24.     ceval = 0;
  25.     ulval = 0;
  26.     boval = 0;
  27.     cchar = '.';
  28.     genesc = '_';
  29.     tjust[0] = LEFT;
  30.     tjust[1] = CENTER;
  31.     tjust[2] = RIGHT;
  32.     bsval = 0;
  33.     rjust = YES;
  34.     ulblnk = BLANK;
  35.  
  36.     for (i = 0; i < INSIZE; i++)
  37.         if (i % 8 == 0)
  38.             tabs[i] = YES;
  39.         else
  40.             tabs[i] = NO;
  41.  
  42.     lineno = 0;
  43.     curpag = 0;
  44.     newpag = 1;
  45.     plval = PAGELEN;
  46.     m1val = 3;
  47.     m2val = 2;
  48.     m3val = 2;
  49.     m4val = 3;
  50.     bottom = plval - m3val - m4val;
  51.     ehead[0] = '\n';
  52.     ehead[1] = EOS;
  53.     ohead[0] = '\n';
  54.     ohead[1] = EOS;
  55.     efoot[0] = '\n';
  56.     efoot[1] = EOS;
  57.     ofoot[0] = '\n';
  58.     ofoot[1] = EOS;
  59.     ehlim[0] = inval;
  60.     ehlim[1] = rmval;
  61.     ohlim[0] = inval;
  62.     ohlim[1] = rmval;
  63.     eflim[0] = inval;
  64.     eflim[1] = rmval;
  65.     oflim[0] = inval;
  66.     oflim[1] = rmval;
  67.     verbose = NO;   
  68.     stopx = 0;
  69.     frstpg = 0;
  70.     lastpg = HUGE;
  71.     print = YES;
  72.     offset = 0;
  73.     outp = 0;
  74.     outw = 0;
  75.     outwds = 0;
  76.     bp = -1;
  77.     for (i = 0; i < 26; i++)
  78.         nr[i] = 0;
  79.  
  80.     CEon = FALSE;
  81.     ULon = FALSE;
  82.     BDon = FALSE;
  83.  
  84.     onlyrunoff = FALSE;
  85.     roman = FALSE;
  86.     bolding = YES;
  87.     autopar = NO;
  88. }
  89.  
  90.